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14 
This file, OTSCCBREQ.REQ, defines the interface to OTSS$PUSH_CCB Edit: SBL1006 


| 

; | 
See eR RAAT ER AAA AAAA AAA AAA AAAAAEAAAAAAAAAEAE RAAT eee 

| 

| 


't COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
!t DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
't ALL RIGHTS RESERVED. 


; I 
‘* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH T 
tt INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY O 

!* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO A 
tt OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HERE 


® 
wk 
® 
® 
® 
® 
® 
® 
® 
® 
ie TRANSFERRED. . 
® 
or 
® 
® 
a 
wy 
5d 
* 
® 
® 


is He INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOT 
Hed SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIP 
Sed CORPORATION. 


i® DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
t® SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


=m 


C 
N 


me 


IT 
GITAL EQUIPM 


See eRe RRR REAR A AAA AAA AAA AAA AERA AAAAAAA AAA 


Revision History: 


1-001 - Original. JBS 09-JAN-1979 
1-002 - phenge name to OTSCCBREQ.REQ so as not to conflict at system 
build time with OTSCCB.B32. SBL 10-Ma y-1979 
1-003 - Add the definition of the structure ter OTSSSAA_LUB_TAB. 
JBS 28-JUN-1979 
1-004 = Add the definition of the field for OTSS$V_LUN_OWNR. 
JBS 16-AUG-1979 
1-005 - ey tet gigeenent, for the new BLISS compiler. 
1-006 - Add new structure OTSSSLUN_OWNR_ST used for OTSS$S$V_LUN_OWNR. This | 
helps BLISS generate smallér code for references to this structure. | 
| 
| 
| 


'¢ 


: Define the return codes from OTSSPUSH_CCB. 


LITERA 
OTS$K PUSH -MIN = Sa ' Smallest valid value 

' CCB loaded, 1/0 not active 

' CCB loaded, 1/0 active on this LUN 

' CCB not loaded, out of virtual storage 

' Largest valid value 


So 
= 
a] 
bad 
x 
pbb) 
“” 
es 
6 
& 
oO 
-_ 
" 
Nor 


1 
OTSCCBREQ.REQ;1 16-SEP-1984 16:51:20.18 Page 


! The following structure is used for addressing OTSSS$AA_LUB_TAB. 
' It is similar to VECTOR, but offsets the index so that certain 

! negative logical unit numbers can be used, and each element is a 
: Quadword so as to act as a queue header. 


STRUCTURE 
OTS$$LUB_TAB_ST CI, SIDE; N, LB, UNIT = 4, EXT = 0) = 
CNtUNIT® 


U 
(OTS$S$LUB_TAB_ST + ((SIDE + (C(I = LB)*2))*UNIT))<0O, B8*UNIT, EXT>; 


‘+ 
_ pense structure is similar to BLOCKVECTOR, but allows a low and high 
' bound. 

i] 


STRUCTURE 
OTS$S$LUN_OWNR_ST CI, 0, P, S, E:; L. H. BS, UNIT=1) = 
C((H"= L)7"+ 1) * BS * UNIT 
(OTSS$LUN_OWNR_ST + (0 = L) + ((O0 + I) * BS * UNIT))<P, S, E>; 


+ 

: The following field is used to refer to OTSS$V_LUN_OWNR, which has a bit 

! for each LUB, each block containing a bit for each language. 

FIELD 

OTSS$V_OWNR_FLD = 
SET 


OTS$$V_OWNR_BAS = [0, LUBSK_LANG_BAS, 1, 0], =! BASIC 
OTSS$V_OWNR_FOR = [O, LUBSK-LANG_FOR, 1, 0] | FORTRAN 
OTSSSV_OUNR = (0; LUBSKTLANG-MIN, (((L 


'¢ 
! The following masks are used to test OTSS$V_OWNR to be sure that only 
! one bit is set. 


LITERA 
OTS$$M_OWNR_BAS = 1 * LUBSK_LANG_BAS, 
OTS$$M~OWNR-FOR = 1 * LUBSK~LANG-FOR: 


End of file OTSCCBREQ.REQ 


UBSK_LANG_MAX=LUBSK_LANG_MIN+%BPUNIT)/%BPUNIT)*%BPUNIT), 0] 


A505 AH-BT13A-SE "DIGITAL EQUIPMENT CORPORATION 
NEVE VAX/VMS V4.0 CONFIDENTIAL 


AND PROPRIETARY 


